home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / text / edit / vim60rt.lha / Vim / vim60 / syntax / slang.vim < prev    next >
Encoding:
Text File  |  2001-05-10  |  3.6 KB  |  103 lines
  1. " Vim syntax file
  2. " Language:    S-Lang
  3. " Maintainer:    Jan Hlavacek <lahvak@math.ohio-state.edu>
  4. " Last Change:    980216
  5.  
  6. " For version 5.x: Clear all syntax items
  7. " For version 6.x: Quit when a syntax file was already loaded
  8. if version < 600
  9.   syntax clear
  10. elseif exists("b:current_syntax")
  11.   finish
  12. endif
  13.  
  14. syn keyword slangStatement    break return continue EXECUTE_ERROR_BLOCK
  15. syn match slangStatement    "\<X_USER_BLOCK[0-4]\>"
  16. syn keyword slangLabel        case
  17. syn keyword slangConditional    !if if else switch
  18. syn keyword slangRepeat        while for _for loop do forever
  19. syn keyword slangDefinition    define typedef variable struct
  20. syn keyword slangOperator    or and andelse orelse shr shl xor not
  21. syn keyword slangBlock        EXIT_BLOCK ERROR_BLOCK
  22. syn match slangBlock        "\<USER_BLOCK[0-4]\>"
  23. syn keyword slangConstant    NULL
  24. syn keyword slangType        Integer_Type Double_Type Complex_Type String_Type Struct_Type Ref_Type Null_Type Array_Type DataType_Type
  25.  
  26. syn match slangOctal        "\<0\d\+\>" contains=slangOctalError
  27. syn match slangOctalError    "[89]\+" contained
  28. syn match slangHex        "\<0[xX][0-9A-Fa-f]*\>"
  29. syn match slangDecimal        "\<[1-9]\d*\>"
  30. syn match slangFloat        "\<\d\+\."
  31. syn match slangFloat        "\<\d\+\.\d\+\([Ee][-+]\=\d\+\)\=\>"
  32. syn match slangFloat        "\<\d\+\.[Ee][-+]\=\d\+\>"
  33. syn match slangFloat        "\<\d\+[Ee][-+]\=\d\+\>"
  34. syn match slangFloat        "\.\d\+\([Ee][-+]\=\d\+\)\=\>"
  35. syn match slangImaginary    "\.\d\+\([Ee][-+]\=\d*\)\=[ij]\>"
  36. syn match slangImaginary    "\<\d\+\(\.\d*\)\=\([Ee][-+]\=\d\+\)\=[ij]\>"
  37.  
  38. syn region slangString oneline start='"' end='"' skip='\\"'
  39. syn match slangCharacter    "'[^\\]'"
  40. syn match slangCharacter    "'\\.'"
  41. syn match slangCharacter    "'\\[0-7]\{1,3}'"
  42. syn match slangCharacter    "'\\d\d\{1,3}'"
  43. syn match slangCharacter    "'\\x[0-7a-fA-F]\{1,2}'"
  44.  
  45. syn match slangDelim        "[][{};:,]"
  46. syn match slangOperator        "[-%+/&*=<>|!~^@]"
  47.  
  48. "catch errors caused by wrong parenthesis
  49. syn region slangParen    matchgroup=slangDelim transparent start='(' end=')' contains=ALLBUT,slangParenError
  50. syn match slangParenError    ")"
  51.  
  52. syn match slangComment        "%.*$"
  53. syn keyword slangOperator    sizeof
  54.  
  55. syn region slangPreCondit start="^\s*#\s*\(ifdef\>\|ifndef\>\|iftrue\>\|ifnfalse\>\|iffalse\>\|ifntrue\>\|if\$\|ifn\$\|\|elif\>\|else\>\|endif\>\)" skip="\\$" end="$" contains=cComment,slangString,slangCharacter,slangNumber
  56.  
  57. " Define the default highlighting.
  58. " For version 5.7 and earlier: only when not done already
  59. " For version 5.8 and later: only when an item doesn't have highlighting yet
  60. if version >= 508 || !exists("did_slang_syntax_inits")
  61.   if version < 508
  62.     let did_slang_syntax_inits = 1
  63.     command -nargs=+ HiLink hi link <args>
  64.   else
  65.     command -nargs=+ HiLink hi def link <args>
  66.   endif
  67.  
  68.   HiLink slangDefinition    Type
  69.   HiLink slangBlock        slangDefinition
  70.   HiLink slangLabel        Label
  71.   HiLink slangConditional    Conditional
  72.   HiLink slangRepeat        Repeat
  73.   HiLink slangCharacter    Character
  74.   HiLink slangFloat        Float
  75.   HiLink slangImaginary    Float
  76.   HiLink slangDecimal        slangNumber
  77.   HiLink slangOctal        slangNumber
  78.   HiLink slangHex        slangNumber
  79.   HiLink slangNumber        Number
  80.   HiLink slangParenError    Error
  81.   HiLink slangOctalError    Error
  82.   HiLink slangOperator        Operator
  83.   HiLink slangStructure    Structure
  84.   HiLink slangInclude        Include
  85.   HiLink slangPreCondit    PreCondit
  86.   HiLink slangError        Error
  87.   HiLink slangStatement    Statement
  88.   HiLink slangType        Type
  89.   HiLink slangString        String
  90.   HiLink slangConstant        Constant
  91.   HiLink slangRangeArray    slangConstant
  92.   HiLink slangComment        Comment
  93.   HiLink slangSpecial        SpecialChar
  94.   HiLink slangTodo        Todo
  95.   HiLink slangDelim        Delimiter
  96.  
  97.   delcommand HiLink
  98. endif
  99.  
  100. let b:current_syntax = "slang"
  101.  
  102. " vim: ts=8
  103.